home *** CD-ROM | disk | FTP | other *** search
/ Ozsi 12 / Ozsi_12_199x_Tide_Side_C.d64 / shd.bobs rtn.bas (.txt) < prev   
Commodore BASIC  |  2023-02-26  |  5KB  |  76 lines
  1. 0 rem"[141][147][158]tomz at the [159]tide[158] bash,in eungai on                    new years eve.
  2. 1 [153]"loaddefwelcome to some 'tidal!' shadebobs done":[151]53280,6
  3. 2 [151]2020,20:[151]2021,9:[151]2022,4:[151]2023,5
  4. 3 [153]"defa longtime ago by'tomz'.please don't   "
  5. 4 [153]"defjudge unless you can do better and by  "
  6. 5 [153]"defthat,we mean,in basic(not on assembler)"
  7. 6 [153]"def    alter the code and play around with"
  8. 7 [153]"defit (you hacker you!??!) press'-space-' ":[151]198,0:[146]198,1
  9. 8 [153]"syscongratulations now press it once more.":[151]198,0:[146]198,1
  10. 10 s[178]54272:[151] s[170]24,15:[151]s[170]5,0:[151]s[170]6,240
  11. 30 [151]53280,0:[151]53281,0:[151]56341,15
  12. 40 [151] s[170]4,16:[153] [199](147)
  13. 50 [129] r[178]3 [164] 18
  14. 60 [151] 214,r:[153] [199](129)
  15. 90 [151]214,18:[153]:[151] 211,r[170]8
  16. 121 [151]2020,20:[151]2021,15:[151]2022,13:[151]2023,26
  17. 130 [130] r
  18. 140 x1[178][181]([187](0)[172]10)[170]14:y1[178]15:d1[178]0.9:d2[178][171]1
  19. 160 x2[178]14:y2[178][181]([187](1)[172]10)[170]6
  20. 161 [151]2020,20:[151]2021,15:[151]2022,13:[151]2023,26:d3[178][171]1:d4[178]0.8
  21. 180 [151]214,y1:[153]:[151] 211,x1
  22. 190 [153]"defspc(wait"
  23. 200 [151] 214,y2:[153]:[151] 211,x2
  24. 210 [153]"printspc(wait"
  25. 220 x1[178]x1[170]d1:y1[178]y1[170]d2:f[178]0
  26. 230 x2[178]x2[170]d3:y2[178]y2[170]d4
  27. 240 [151]214,y1:[153]:[151]211,x1
  28. 250 [153] [199](156);[199](113)
  29. 260 [151]214,y2:[153]:[151]211,x2
  30. 270 [153] [199](159);[199](113)
  31. 280 [139] x1[179]13 [176] x1[177]25 [167] d1 [178][171]d1:f[178]1
  32. 290 [139] y1[179]5 [176] y1[177]16 [167] d2[178][171]d2:f[178]1
  33. 300 [139] x2[179]13 [176] x2[177]24 [167] d3[178][171]d3:f[178]2
  34. 310 [139] y2[179]5 [176] y2[177]17 [167] d4[178][171]d4:f[178]2
  35. 320 [139] x2[179][178]x1[170]1 [175] x2[177][178]x1[171]1 [175] y2[179][178]y1[170]1 [175] y2[177]y1[171]1 [167] f[178]3
  36. 330 [139] f[178]0 [167] 180
  37. 340 [139] f[178]1 [167] 370
  38. 350 [139] f[178]3 [167] 370
  39. 370 [139] f[178]3 [167] 10
  40. 380 [137] 580
  41. 430 [151]53280,0:[151]53281,0
  42. 440 [153] [199](147)
  43. 450 [129] r[178]3 [164] 18
  44. 460 [151] 214,r:[153] [199](129)
  45. 490 [151]214,18:[153]:[151] 211,r[170]8
  46. 492 [151]2020,20:[151]2021,15:[151]2022,13:[151]2023,26
  47. 530 [130] r
  48. 540 x1[178][181]([187](0)[172]10)[170]14:y1[178]15
  49. 550 d1[178]0.9:d2[178][171]1
  50. 560 x2[178]14:y2[178][181]([187](1)[172]10)[170]6
  51. 561 [151]2020,20:[151]2021,15:[151]2022,13:[151]2023,26
  52. 570 d3[178][171]1:d4[178]0.8
  53. 580 [151]214,y1:[153]:[151] 211,x1
  54. 590 [153]"spc(wait"
  55. 600 [151] 214,y2:[153]:[151] 211,x2
  56. 610 [153]"clrspc(wait"
  57. 620 x1[178]x1[170]d1:y1[178]y1[170]d2:f[178]0
  58. 630 x2[178]x2[170]d3:y2[178]y2[170]d4
  59. 640 [151]214,y1:[153]:[151]211,x1
  60. 650 [153] [199](156);[199](113)
  61. 660 [151]214,y2:[153]:[151]211,x2
  62. 670 [153] [199](159);[199](113)
  63. 680 [139] x1[179]13 [176] x1[177]25 [167] d1 [178][171]d1:f[178]1
  64. 690 [139] y1[179]5 [176] y1[177]16 [167] d2[178][171]d2:f[178]1
  65. 700 [139] x2[179]13 [176] x2[177]24 [167] d3[178][171]d3:f[178]2
  66. 710 [139] y2[179]5 [176] y2[177]17 [167] d4[178][171]d4:f[178]2
  67. 720 [139] x2[179][178]x1[170]1 [175] x2[177][178]x1[171]1 [175] y2[179][178]y1[170]1 [175] y2[177]y1[171]1 [167] f[178]3
  68. 730 [139] f[178]0 [167] 180
  69. 740 [139] f[178]1 [167] 770
  70. 750 [139] f[178]3 [167] 770
  71. 770 [139] f[178]3 [167] 180
  72. 780 [137] 180
  73. 800 [143] use this in your demos ????
  74. 801 [143] **** but only if you want to
  75. 802 [143] ......................./tomz
  76.